#-*- coding: UTF-8 -*-

# ****************设置基本信息****************
#                                            *
# 脚本标题：04 设置工作表属性
# 脚本描述：<此处填写描述文本>
# -------------------------------------------*
# 前景色：黑色
# 背景色：透明色
# 调用方式：0
# -------------------------------------------*
# 快捷键：
# 工具条按钮文本：
# -------------------------------------------*
# 组名：
# 快捷工具条按钮组：
#                                            *
# ***********基本信息不应超过 80 行***********

clr.AddReference("LunarMarkdownEditor")
from lme import *
from LunarSF.SHomeWorkshop.LunarMarkdownEditor.Utils.NPOIHelp import *
from LunarSF.SHomeWorkshop.LunarMarkdownEditor.Utils import R, Text, TextPiece

if not 'popButtonGroupName' in vars():
    popButtonGroupName = ''
if not 'popButtonArgs' in vars():
    popButtonArgs = ''

ae = psArgs.Ae      #  ae：活动编辑器
ate = psArgs.Ate    # ate：活动编辑器内核


# ********您可以从这里开始写自己的脚本****************
# ********向编辑器中输出文本请务必以 \r\n 换行********

# wb = 创建excel文档(False)
# for i in range(18):
#     wb.创建工作表("Sheet" + str(i + 1))
# 
# wb.按位置取工作表(0).置纸张类型(纸张类型.PaperLetter).置单元格文本值("B2", "PaperLetter")
# wb.按位置取工作表(1).置纸张类型(纸张类型.PaperLegal).置单元格文本值("B2", "PaperLegal")
# wb.按位置取工作表(2).置纸张类型(纸张类型.PaperExecutive).置单元格文本值("B2", "PaperExecutive")
# wb.按位置取工作表(3).置纸张类型(纸张类型.PaperA4).置单元格文本值("B2", "PaperA4")
# wb.按位置取工作表(4).置纸张类型(纸张类型.PaperA5).置单元格文本值("B2", "PaperA5")
# wb.按位置取工作表(5).置纸张类型(纸张类型.Paper10号信封).置单元格文本值("B2", "Paper10号信封")
# wb.按位置取工作表(6).置纸张类型(纸张类型.PaperDL信封).置单元格文本值("B2", "PaperDL信封")
# wb.按位置取工作表(7).置纸张类型(纸张类型.PaperC5信封).置单元格文本值("B2", "PaperC5信封")
# wb.按位置取工作表(8).置纸张类型(纸张类型.PaperB5信封).置单元格文本值("B2", "PaperB5信封")
# wb.按位置取工作表(9).置纸张类型(纸张类型.PaperMonarch信封).置单元格文本值("B2", "PaperMonarch信封")
# wb.按位置取工作表(10).置纸张类型(纸张类型.PaperB5).置单元格文本值("B2", "PaperB5")
# wb.按位置取工作表(11).置纸张类型(纸张类型.PaperB5ISO).置单元格文本值("B2", "PaperB5ISO")
# wb.按位置取工作表(12).置纸张类型(纸张类型.PaperB5JIS).置单元格文本值("B2", "PaperB5JIS")
# wb.按位置取工作表(13).置纸张类型(纸张类型.PaperA6).置单元格文本值("B2", "PaperA6")
# wb.按位置取工作表(14).置纸张类型(纸张类型.Paper双面明信片).置单元格文本值("B2", "Paper双面明信片")
# wb.按位置取工作表(15).置纸张类型(纸张类型.Paper明信片).置单元格文本值("B2", "Paper明信片")
# wb.按位置取工作表(16).置纸张类型(纸张类型.Paper8513).置单元格文本值("B2", "Paper8513")
# wb.按位置取工作表(17).置纸张类型(纸张类型.Paper16K).置单元格文本值("B2", "Paper16K")

# wb.保存(工作区附件目录路径 + '04_页面尺寸测试效果.xlsx').打开自身()

wb = 创建excel文档()

sht = wb.首工作表
sht.插入分页符(24)  # 在第 25 行插入一个分页符
sht.置单元格文本值("A1", "A1")
sht.置单元格文本值("AA1", "AA1")
sht.置页面水平居中()
sht.缩放所有列到单页()
sht.置页边距(2, 3, 4, 5)
sht.插入页眉("这是页眉文本", "l")
sht.插入页脚("这是页脚文本", "r")
sht.置页眉页脚边距(2, 3)

wb.保存(工作区附件目录路径 + "04_页面方向.xlsx").打开自身()

# sht.置页面方向("h").置纸张类型(纸张类型.PaperMonarch信封).置单元格文本值("B2", "PaperMonarch信封，横向")


























# -------------------------------------------*
#                                            *
ignoreTextChanging = True #                  *
#                                            *
# 高级脚本通常需要设置上面这个变量为 True。  *
#                                            *
#                                            *
outputText = ''           #                  *
# 高级脚本通常不需要设置此变量的值。         *
# 如非必要，请勿修改本行。                   *
# -------------------------------------------*

